﻿Public Class CapDau
    Private _chu As String
    Private _khach As String
    Sub New()
        _chu = 0
        _khach = 0
    End Sub
    Sub New(ByVal cd As CapDau)
        _chu = cd.Chu
        _khach = cd.Khach

    End Sub

    Public Property Chu() As String
        Get
            Return _chu
        End Get
        Set(value As String)
            _chu = value
        End Set
    End Property

    Public Property Khach() As String
        Get
            Return _khach
        End Get
        Set(value As String)
            _khach = value
        End Set
    End Property
End Class
